home *** CD-ROM | disk | FTP | other *** search
/ InterCD 2001 June / june_2001.iso / Html / CuteHtml / setup.exe / +DISTANCES BETWEEN WORLD CITIES.JS < prev    next >
Encoding:
Text File  |  1999-09-03  |  7.4 KB  |  217 lines
  1. <!-- js v2.9 96.08.12 jhk -->
  2. <!-- Cut-N-Paste JavaScript from ISN Toolbox 
  3.      Copyright 1996, Infohiway, Inc.  Restricted use is hereby
  4.      granted (commercial and personal OK) so long as this code
  5.      is not *directly* sold and the copyright notice is buried
  6.      somewhere deep in your HTML document.  A link to our site
  7.      http://www.infohiway.com is always appreciated of course,
  8.      but is absolutely and positively not necessary. ;-)   -->
  9. <script language="JavaScript">
  10. <!-- This Script And Over 400 Others Found At --!>
  11. <!--    Java City 2000 http://www.jc2k.com    --!>
  12. <!-- Hide from JavaScript-Impaired Browsers
  13. var l=0;
  14. var r=0;
  15. var tc="";
  16. var al=" abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ123456789";
  17. var ns="0123456789";
  18. function iA(){
  19.  this.length=iA.arguments.length;
  20.  for (var i=0;i<this.length;i++){
  21.   this[i]=iA.arguments[i];
  22.  }
  23. }
  24. /* 3011 byte database of air distances uses position in the
  25.    string "al" to substitute for the numerics, saving a bit
  26.    over 4k download to visitors. */
  27. var a=new iA(35);
  28. a[0]="Berlin, Germany*   ciagchdcheihh dadeee gcaa hdef egeghfaci"
  29. +"ibf da  cifdcd ebehe eddegagecehadhfaa gcgh e debbfageedkbgdca";
  30. a[1]="Bombay, India*   ibga deacde dhabfgh bbiifhgddfhg caefa igb"
  31. +"cacggiei dacigddcfbifbffgcgeaihbfchdj dggdcacbdcdaigfhbhf";
  32. a[2]="Buenos Aires, Argentina*   jbddbgiaceifkdfgefgegggffibfabk "
  33. +"dgbcdfchchec hhegfacchfhhkiggcfefhga abbfic gffialb ihfkd fbffdb";
  34. a[3]="Calcutta, India*   f ccgdeebaecg dcfefccdiehaebaieeeie cdeg"
  35. +"ibebgddfjaadhib bceagdhedaichde jiigbbbaaagicaig dchf";
  36. a[4]="Capetown, South Africa*   fiee hgcgkecebbjccf aiiggecfdahea"
  37. +"fbigh jaafdig aehdh edeighfgaacggebee  jb h ff bi gg bbce";
  38. a[5]="Darwin, Australia*   ibgbfdecfgcigaahf ghdaihaifi hg eiiffb"
  39. +"dh bjcehehcgcgafigbhfciifhaihifgfbcadb hccgccafda";
  40. a[6]="Gibraltar*   fhch hahgebga ieidgdhjh efcbdacfced agidic iff"
  41. +" abahcchb edgha cfdaedfffegbcfiil fda ";
  42. a[7]="Hong Kong, China*   eeddihefceihgbd fidfahghdddh edeeecdj h"
  43. +"eifabcdihgfef ck  eggkfafdg ggafeah eheeda";
  44. a[8]="Honolulu, Hawaii, USA*   ha bhbgbcbefec eeacghg cdifc  fghe"
  45. +"begdce ghgde  f hhaih bfgibfhdicfgachedgajhg";
  46. a[9]="Istanbul, Turkey*   ee aeefhdeffi iga a ie aea aebfgead dch"
  47. +" fidfdbeffd  hehagf fdifecgeefjffcca";
  48. a[10]="Juneau, Alaska, USA*   ddbahdehgh dcbbdecbhea id eddfdfcde"
  49. +"bfbbbffcbggf ebegbg i dhggbdd agdhhh ";
  50. a[11]="London, England, UK*   eddffgje eedaeecdfdch gaebh bae eba"
  51. +"eca aagegg higbfdghegafgdeidkfhdf ";
  52. a[12]="Los Angeles, California, USA*   gbggicaedf gbdebhheccc  ef"
  53. +" fbegecbehdcafc fcceec iffdhhggedgfgaj b";
  54. a[13]="Manilla, Luzon, Phillipines*   cidhhceachdidhbf bjbhffgagg"
  55. +"efbhabffekbefdfjicffdaaeadhahfeafegf";
  56. a[14]="Melbourne, Australia*   hdbhifjcfgefiici bjd efghffje jedh"
  57. +"aiiicg  haie acgfe iaf fh ";
  58. a[15]="Mexico City, Mexico*   ffib idcaegaae egaggcgfgbdedfbdggfc"
  59. +"ed ebcdh djcag dfi idh";
  60. a[16]="Moscow, Russia*   dffd da bfgaaedcf agadbdb fgb adghgieb d"
  61. +"bdebddfejbhdbg";
  62. a[17]="New York City, New York, USA*   cggcfgbbccfbfhbeei ddbehdh"
  63. +"bdbge ibdagcfifcfgdhiegg ";
  64. a[18]="Nome, Alaska, USA*   chdeeddegcdcegecdiccgheie hhcfaihcghf"
  65. +"aebihgchhba";
  66. a[19]="Oslo, Norway*   efi hcdcfbbacbfa hfdhabdgiadeie bfbeebbjig"
  67. +"dh ";
  68. a[20]="Panama City, Panama*   echhiagaebffdgacbiei bidcfeicbkfihd"
  69. +"bgdchbe";
  70. a[21]="Paris, France*   ea aihcbdacheg  fhgbediiegeffgf ckgidd ";
  71. a[22]="Peking, China*   dehfdbdi jgge ekgged  ffbggacafg eh ";
  72. a[23]="Port Said, Suez Canal, Egypt*   ebecbcfbdacbh ifgfeace ieh"
  73. +"djbebgc";
  74. a[24]="Quebec, Quebec, Canada*   baieaccidee bcefihia fdbibcgdd";
  75. a[25]="Reykjavik, Faxa Bay, Iceland*   fabb dgbccfaeefgafedgjgbegf";
  76. a[26]="Rio de Janeiro, Brazil*   efiahffhikcdiggkedgceeei";
  77. a[27]="Rome, Italy*   gdbeffefhfbcfabkebcga";
  78. a[28]="Santiago, Chile*   fbckfejbcjfdegigah";
  79. a[29]="Seattle, Washington, USA*   eg h fdghgbdicf";
  80. a[30]="Shanghai, China*   bcha if eeig";
  81. a[31]="Singapore, Singapore*   cc ebiddh";
  82. a[32]="Tokyo, Japan*   egfg d";
  83. a[33]="Wellington, New Zealand*   hab";
  84. a[34]="Zanzibar City, Tanzania*   ";
  85. var b=new iA(4);
  86. b[0]=1;
  87. b[1]=10;
  88. b[2]=100;
  89. b[3]=1000;
  90. b[4]=10000;
  91. function getMiles(form){
  92.  lf=(document.isn.isn1.options[document.isn.isn1.selectedIndex].value);
  93.  rf=(document.isn.isn2.options[document.isn.isn2.selectedIndex].value);
  94.  l=al.indexOf(lf);
  95.  r=al.indexOf(rf);
  96.  if (r<l){
  97.   l=r;
  98.   r=al.indexOf(lf);
  99.   }
  100.  ls=a[l];
  101.  pos=ls.indexOf("*")
  102.  ls1="From "+ls.substring(0,pos)+" to "
  103.  +a[r].substring(0,a[r].indexOf("*"))+" is about ";
  104.  ls=ls.substring(pos+1,ls.length);
  105.  tc=ls.substring(((r*3)-(l*3)),ls.length);
  106.  if (document.isn.rb[1].checked){
  107.   dispKm();
  108.   }
  109.  else{
  110.   dispMi();
  111.   }
  112. }
  113. function dispMi(){
  114.  ch=tc.charAt(0);
  115.  ls1+=al.indexOf(ch);
  116.  ch=tc.charAt(1);
  117.  ls1+=al.indexOf(ch);
  118.  ch=tc.charAt(2);
  119.  if (ch!=" "){
  120.   ls1+=(al.indexOf(ch)*10)+" miles";
  121.   } //1.613
  122.   else ls1+="00"+" miles";
  123.  document.isn.disp.value=ls1;
  124. }
  125. function dispKm(){
  126.  ch=tc.charAt(0);
  127.  km="";
  128.  km+=al.indexOf(ch);
  129.  ch=tc.charAt(1);
  130.  km+=al.indexOf(ch);
  131.  ch=tc.charAt(2);
  132.  if (ch!=" "){
  133.   km+=(al.indexOf(ch)*10);
  134.   }
  135.   else{
  136.    km+="00";
  137.   }
  138.   num=0;
  139.   kml=km.length;
  140.   for (var i=kml-1;i>-1;i--){
  141.    cr=km.substring(i,i+1);
  142.    pos=ns.indexOf(cr);
  143.    num+=pos*b[kml-i-1];
  144.   }
  145.   km="";
  146.   km+=num*1.613;
  147.   pos=km.indexOf(".");
  148.   if (pos>-1){
  149.    km=km.substring(0,pos);
  150.   }
  151.   ls1+=km+" kilometers";
  152.   document.isn.disp.value=ls1;
  153. }
  154. // End Hiding -->
  155. </SCRIPT>
  156. </HEAD>
  157. <BODY BGCOLOR="#FFFFFF" TEXT="#000000" LINK="#FF0000" VLINK="#000080" ALINK="#000080">
  158. <!-- Your Web Page Content Here -->
  159.  
  160. <FORM NAME="isn">
  161. <TABLE BORDER=0 WIDTH=486>
  162. <TR><TD COLSPAN=3 ALIGN=CENTER>
  163. <HR NOSHADE><FONT COLOR="blue">
  164. <B>Air Distances between Selected World Cities</B></FONT></TD></TR>
  165. <TR><TD ALIGN=CENTER><FONT COLOR="blue">
  166. <B>Starting City</B></FONT><BR><SELECT NAME="isn1" SIZE=12>
  167. <script language="JavaScript">
  168. <!-- This Script And Over 400 Others Found At --!>
  169. <!--    Java City 2000 http://www.jc2k.com    --!>
  170. <!-- Hide from JavaScript-Impaired Browsers
  171. ls="";
  172. for (var i=0;i<35;i++){
  173.  ls+='<OPTION VALUE="'+al.substring(i,i+1)+'" onClick=""';
  174.  if (i==0){ls+=' SELECTED';}
  175.  ls+='>'+a[i].substring(0,a[i].indexOf("*"));
  176.  }
  177. document.write(ls);
  178. // End hiding -->
  179. </SCRIPT>
  180. </SELECT></TD>
  181. <TD ALIGN=CENTER VALIGN=TOP><FONT COLOR="blue" SIZE=1>
  182. <B>Instructions:</B></FONT>
  183. <BR>Select starting city at left, destination at right. 
  184. Or, if you are feeling particularly contrary today, 
  185. vice versa. Then click below.<P>
  186. <INPUT TYPE="button" NAME="but" VALUE=" Get Distance " onClick="getMiles(this.form)">
  187. <BR><INPUT TYPE="radio" NAME="rb" VALUE="a" CHECKED onClick="">Miles 
  188. <INPUT TYPE="radio" NAME="rb" VALUE="b" onClick="">Kilometers
  189. <TD ALIGN=CENTER><FONT COLOR="blue">
  190. <B>Destination City</B></FONT>
  191. <BR><SELECT NAME="isn2" SIZE=12>
  192. <script language="JavaScript">
  193. <!-- This Script And Over 400 Others Found At --!>
  194. <!--    Java City 2000 http://www.jc2k.com    --!>
  195. <!-- Hide from JavaScript-Impaired Browsers
  196. ls="";
  197. for (var i=0;i<35;i++){
  198.  ls+='<OPTION VALUE="'+al.substring(i,i+1)+'" onClick=""';
  199.  if (i==1){ls+=' SELECTED';}
  200.  ls+='>'+a[i].substring(0,a[i].indexOf("*"));
  201.  }
  202. document.write(ls);
  203. // End hiding -->
  204. </SCRIPT>
  205. </SELECT></TD></TR>
  206. <TR><TD COLSPAN=3 ALIGN=CENTER>
  207. <TABLE BORDER=2>
  208. <TR><TD>
  209. <INPUT TYPE="text" NAME="disp" VALUE="" SIZE=80>
  210. </TD></TR>
  211. </TABLE></TD></TR>
  212. <TR><TD COLSPAN=3><HR NOSHADE></TD></TR>
  213. </TABLE>
  214. </FORM>
  215. </CENTER><P>
  216. </BODY>
  217. </HTML>